﻿Public Class Edepartamento

    Private cod_departamento As Integer
    Private nombre_departamento As String
    Private cod_provincia As String

    Public Sub New()
        MyBase.New()
        cod_departamento = ""
        nombre_departamento = ""
        cod_provincia = ""

    End Sub


    Public Property coddepartamento() As Integer
        Get
            Return cod_departamento
        End Get
        Set(ByVal value As Integer)
            cod_departamento = 0
        End Set
    End Property

    Public Property nomdepartamento() As String
        Get
            Return nombre_departamento
        End Get
        Set(ByVal value As String)
            nombre_departamento = ""
        End Set
    End Property

    Public Property codprovincia() As String
        Get
            Return cod_provincia
        End Get
        Set(ByVal value As String)
            cod_provincia = ""
        End Set
    End Property

End Class
